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1. Implementation 
1 \ProvidesFile{klu9.clo}[\f iledate ] 
1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9.5, 9/11, 10/12, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcoimnand\normalslze{'/, 

3 \@setf ontsize\normalsize\@ixpt{ll}'/, 

4 \abovedisplayskip 8.5\p(S \aplus3\pS \Sminus4\pS 

5 \abovedisplayshortskip \za \aplus2\p(3 

6 \belowdisplayshortskip 4\p(S \aplus2\p® \@minus2\pS 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\QlistI} 

9 Xnormalsize 

10 \newconmiand\small{'/, 

11 \asetf ontsize\small\(avliipt{9 . 5}'/, 

12 \abovedisplayskip 6\p(S \(Splus2\p@ \aininus4\pQ 

13 \abovedisplaysliortskip \z® \®plus\pa 

14 \belowdisplayshortskip 3\p8 \Splus\pa \Sminus2\p@ 
16 \def \Slisti{\leftmargin\leftmargini 

16 \topsep 3\pa \Qplus\pa \aminus\pa 

17 \parsep 2\pa \Splus\pa \aminus\pa 

18 \itemsep Xparsep}"/. 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconmiand\f ootnotesize{'/, 

22 \@setf ontsize\f ootnotesize\aviipt{8}7, 

23 \abovedisplayskip 4\p@ \@plus2\p@ \aininus2\pa 

24 \abovedisplayshortsklp \za \aplus\pa 

25 \belowdisplayshortskip 2\pa \aplus\pa \aminusl\p® 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pS \aplus\pS \Sminus\pS 

28 \parsep INpS \aplus\pS \aminus\pS 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcoimiiaiid\scriptsize{\asetf ontsize\scriptsize\avipt\®viipt} 

33 \newcoiimaiid\little{\asetf ontsize\little\avpt\avipt} 

34 \newconmiaiid\tiny{\asetf ontsize\tiny\avpt\avipt} 

36 \newconmand\large{\Qsetf ontsize\large\axpt\8xiipt} 

36 \newcoiimaiid\Large{\Ssetf ontsize\Large\exiipt{14}} 

37 \newcoiimaiid\LARGE{\asetf ontsize\LARGE\®xivpt{18}} 

38 \newconmand\huge{\asetf ontsize\huge\axviipt{22}} 

39 \newconmand\Huge{\asetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-liii} 

41 \setlength\vof f set{-lin} 

42 \setlength\par indent {14\pa} 

43 \setlength\headlieight{12\pS} 
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44 \setlength\headsep •{12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\pa} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\pa} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt]- 

53 \setlength\f boxsep{3pt} 
64 \setlength\fboxrule{.4pt} 

1.3. Textheight and TEXTWIDTH 

These axe the main reason for the existence of these files. For some stupid reason, I^TJ^X calculates 
textwidth out of \paperwidth.. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth arc set iu the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}7, 

58 \addtolength\atempdima{-\textwidth}y, 

59 \divide\atempdlma by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\atempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}y, 

63 \ifdlm \atempdima <\atempdimb 

64 \esettopoint\atempdimb 

66 \GenericError{Polntsize}{Pointsize Error: Marginpars disabled]-{]-{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide. \MessageBreak 

68 The allowed value for margin space: (\the\Stempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }•/. 

74 \marginparwidth \zS 

75 \marginparsep \za 
7B \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\Stempdimb) . Please press X and try again. 
86 }•/. 

86 \f i 

87 \oddsidemargin \atempdima 

88 \evensidemargin \9tempdima 
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These calculations arc a lot easier, \textheight should have been set already. This does not 
check for the correct placcrrieut of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\@tenipdinia{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima)- 

94 \addtolength\atempdima{-\textheight}- 

95 \dlvlde\@tempdlma by 2 

96 \ifdlm \@tempdlma <2pc 

97 \advaiice\8tempdimb by -4pc 

98 \Ssettopoint\Stempdimb 

99 \GenericError{Polntslze}{Pointsize Error: Invalid sizes glven}{}{You 

100 made your \string\textheight\space (\the\texthelght) 

101 more than the available total . \MessageBreak 

102 (Which Is: \the\Stempdlmb) . Please press X and try again. 

103 }"/. 

104 \fi 

105 \setlength\topmargin{\Stempdima} 

106 \setlength\ldSboxhelght{\Stempdlma} 

107 \advance\ldSboxhelght by -2pc 

108 } 

109 \setlength\footnotesep{6\pS} 

110 \setlength{\skip\footlns}{9\pS \®plus 4\pa XSmlnus 2\pa} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\pQ \9plus l\pQ \9mlnus l\pS} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\leftmarginil}{2em} 

114 \setlength{\lef tmargini 1 1}{ 1 . 7em} 

115 \setlength{\lef tmarginiv}-[l .4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 
lis \setlength{\labelsep}{.4eiii} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwldth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 8\pS \Splus2\pa \Sminus2\pa 

124 \partopsep 2\pS XSplus l\pa \aminus l\pa 

125 \itemsep 4\pa \aplus 2\pS \aminus l\pa 

126 \parsep 4\p@ \Splus 2\pe \Sminus l\pa } 

127 \def \aiistii{*/. 

128 \leftmargin \lef tmargini! 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \aplus 2\pa XSmlnus l\p9 

132 \parsep 2\pa \@plus INpS \@minus l\p9 

133 \ltemsep \parsep} 
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134 Ndef \Slistiii-['/. 

136 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \aplus l\p9 \9minus INpS 

139 \parsep XzO 

140 Npartopsep l\pS XOplus 0\pS \Sminus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{*/. 

143 \setlength{\lef tmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\leftmargin}{\leftmarginv}°/, 

148 \setlength{\labelwidth}{\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \Slistvi{% 

151 \setlength{\leftmargin}{\leftmarginvi}'/. 

152 \setlength{\labelwidth}{\lef tmarginvi}'/, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \Slisti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pa \(Splus 2\pa XOminus 2\pa} 

157 \setlength\textf loatsep{18\pa \aplus 2\pa \aminus 4\pa} 

158 \setlength\intextsep{10\pa \aplus 2\pa \aminus 2\pa} 

159 \setlength\dblf loatsep{10\pa \aplus 2\pa Xaminus 2\pa} 

160 \setlength\dbltextf loatsep{18\pa \®plus 2\pa \®minus 4\pe} 

Separation on float pages 

161 \setlength\afptop{0\pa \aplus if il} 

162 \setlength\afpsep{8\pa \aplus 2f il} 

163 \setlength\afpbot{0\pa \aplus If il} 

164 \setlength\adblfptop{0\pa \aplus If il} 

165 \setlength\adblfpsep{8\pa \@plus 2f il} 

166 \setlength\adblfpbot{0\p8 \8plus If il} 
167 

168 \endinput 
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1. Implementation 
1 \ProvidesFile{klut9.clo}[\f iledate ] 
1.1. Section size commands 

added command: \little. This is identical to \tiny here. Allowed type provided values: 5/6, 
6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/13, 12/14, 14/18, 17/22, 20/25. 



2 \renewcoimnand\normalslze{'/, 

3 \@setf ontsize\normalsize\@ixpt{10 . 5}'/. 

4 \abovedisplayskip 8.5\p(S \aplus3\pS \Sminus4\pS 

5 \abovedisplayshortskip \za \aplus2\p(3 

6 \belowdisplayshortskip 4\p(S \aplus2\p® \Sminus2\pS 

7 \belowdisplayskip \abovedisplayskip 

8 \let\listi\QlistI} 

9 Xnormalsize 

10 \newconmiand\small{'/, 

11 \asetf ontsize\small\(avliipt{9}'/, 

12 \abovedisplayskip 6\p(S \(Splus2\p@ \aininus4\pQ 

13 \abovedisplaysliortskip \z® \®plus\pa 

14 \belowdisplayshortskip 3\p8 \Splus\pa \Sminus2\p@ 
16 \def \Slisti{\leftmargin\leftmargini 

16 \topsep 3\pa \Qplus\pa \aminus\pa 

17 \parsep 2\pa \Splus\pa \aminus\pa 

18 \itemsep Xparsep}"/. 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconmiand\f ootnotesize{'/, 

22 \@setf ontsize\f ootnotesize\aviipt{8}7, 

23 \abovedisplayskip 4\p@ \@plus2\p@ \aininus2\pa 

24 \abovedisplayshortsklp \za \aplus\pa 

25 \belowdisplayshortskip 2\pa \aplus\pa \aminusl\p® 

26 \def \aiisti{\lef tmargin\lef tmargini 

27 \topsep 2\pS \aplus\pS \Sminus\pS 

28 \parsep INpS \aplus\pS \aminus\pS 

29 \itemsep \parsep}'/, 

30 \belowdisplayskip \abovedisplayskip 



31 } 

32 \newcoimiiaiid\scriptsize{\asetf ontsize\scriptsize\avipt\®viipt} 

33 \newcoiimaiid\little{\asetf ontsize\little\avpt\avipt} 

34 \newconmiaiid\tiny{\asetf ontsize\tiny\avpt\avipt} 
36 \newconmand\large{\Qsetf ontsize\large\8xpt{ll .5}} 

36 \newcoiimaiid\Large{\Ssetf ontsize\Large\exiipt{14}} 

37 \newcoiimaiid\LARGE{\asetf ontsize\LARGE\®xivpt{18}} 

38 \newconmand\huge{\asetf ontsize\huge\axviipt{22}} 

39 \newconmand\Huge{\asetf ontsize\Huge\axxpt{25}} 

1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations below 
easier. 

40 \setlength\hof f set{-liii} 

41 \setlength\vof f set{-lin} 

42 \setlength\par indent {14\pa} 

43 \setlength\headlieight{12\pS} 
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44 \setlength\headsep •{12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {25\pa} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\pa} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\amaxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\columnseprule{Opt]- 

53 \setlength\f boxsep{3pt} 
64 \setlength\fboxrule{.4pt} 

1.3. Textheight and TEXTWIDTH 

These axe the main reason for the existence of these files. For some stupid reason, I^TJ^X calculates 
textwidth out of \paperwidth.. We did want to support letter paper, but our \textwidth is fixed, 
with the margins being calculated. 

Presume \textwidth and \marginparwidth arc set iu the stylefile, or we're in trouble. The 2pc 
value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and later on 
in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDocument{'/, 



57 \setlength\atempdima{\paperwidth}7, 

58 \addtolength\atempdima{-\textwidth}y, 

59 \divide\atempdlma by 2 

60 \setlength\atempdimb\marginparwidth 

61 \addtolength\atempdimb\marginparsep 

62 \addtolength\atempdimb{2pc}y, 

63 \ifdlm \atempdima <\atempdimb 

64 \esettopoint\atempdimb 

66 \GenericError{Polntsize}{Pointsize Error: Marginpars disabled]-{]-{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide. \MessageBreak 

68 The allowed value for margin space: (\the\Stempdima) . Needed value: 

69 (\the\atempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }•/. 

74 \marginparwidth \zS 

75 \marginparsep \za 
7B \fi 

77 \ifdim \atempdima <2pc 

78 \atempdimb=\paperwidth 

79 \advance\atempdimb by -4pc 

80 \asettopoint\atempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\Stempdimb) . Please press X and try again. 
86 }•/. 

86 \f i 

87 \oddsidemargin \atempdima 

88 \evensidemargin \9tempdima 
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These calculations arc a lot easier, \textheight should have been set already. This does not 
check for the correct placcrrieut of the identification line!! 

89 \setlength\atempdima{\paperheight} 

90 \addtolength\@tenipdinia{-\f ootskip} 

91 \addtolength\atempdima{-\headheight} 

92 \addtolength\atempdima{-\headsep} 

93 \setlength\atempdimb{\3tempdima)- 

94 \addtolength\atempdima{-\textheight}- 

95 \dlvlde\@tempdlma by 2 

96 \ifdlm \@tempdlma <2pc 

97 \advaiice\8tempdimb by -4pc 

98 \Ssettopoint\Stempdimb 

99 \GenericError{Polntslze}{Pointsize Error: Invalid sizes glven}{}{You 

100 made your \string\textheight\space (\the\texthelght) 

101 more than the available total . \MessageBreak 

102 (Which Is: \the\Stempdlmb) . Please press X and try again. 

103 }"/. 

104 \fi 

105 \setlength\topmargin{\Stempdima} 

106 \setlength\ldSboxhelght{\Stempdlma} 

107 \advance\ldSboxhelght by -2pc 

108 } 

109 \setlength\footnotesep{6\pS} 

110 \setlength{\skip\footlns}{9\pS \®plus 4\pa XSmlnus 2\pa} 



1.4. Lists 

List default values 

111 \setlength\partopsep{2\pQ \9plus l\pQ \9mlnus l\pS} 

112 \setlength{\lef tmargini}{l . 9em} 

113 \setlength{\leftmarginil}{2em} 

114 \setlength{\lef tmargini 1 1}{ 1 . 7em} 

115 \setlength{\lef tmarginiv}-[l .4em} 

116 \setlength{\lef tmarginv}{lem} 

117 \setlength{\lef tmarginvi}{lem} 
lis \setlength{\labelsep}{.4eiii} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwldth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This results in 
very small labels for the inner lists. 

121 \def \aiistl{7. 

122 \leftmargin \lef tmargini 

123 \topsep 8\pS \Splus2\pa \Sminus2\pa 

124 \partopsep 2\pS XSplus l\pa \aminus l\pa 

125 \itemsep 4\pa \aplus 2\pS \aminus l\pa 

126 \parsep 4\p@ \Splus 2\pe \Sminus l\pa } 

127 \def \aiistii{*/. 

128 \leftmargin \lef tmargini! 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \aplus 2\pa XSmlnus l\p9 

132 \parsep 2\pa \@plus INpS \@minus l\p9 

133 \ltemsep \parsep} 
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134 Ndef \Slistiii-['/. 

136 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \aplus l\p9 \9minus INpS 

139 \parsep XzO 

140 Npartopsep l\pS XOplus 0\pS \Sminus l\p@ 

141 \itemsep \topsep} 

142 \def \@listiv{*/. 

143 \setlength{\lef tmargin}{\lef tmarginiv}'/, 

144 \setlength{\labelwidth}{\lef tmarginiv}'/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \Slistv{'/. 

147 \setlength{\leftmargin}{\leftmarginv}°/, 

148 \setlength{\labelwidth}{\leftmarginv}°/, 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \Slistvi{% 

151 \setlength{\leftmargin}{\leftmarginvi}'/. 

152 \setlength{\labelwidth}{\lef tmarginvi}'/, 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\@listl 

155 \Slisti 



1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{10\pa \(Splus 2\pa XOminus 2\pa} 

157 \setlength\textf loatsep{18\pa \aplus 2\pa \aminus 4\pa} 

158 \setlength\intextsep{10\pa \aplus 2\pa \aminus 2\pa} 

159 \setlength\dblf loatsep{10\pa \aplus 2\pa Xaminus 2\pa} 

160 \setlength\dbltextf loatsep{18\pa \®plus 2\pa \®minus 4\pe} 

Separation on float pages 

161 \setlength\afptop{0\pa \aplus if il} 

162 \setlength\afpsep{8\pa \aplus 2f il} 

163 \setlength\afpbot{0\pa \aplus If il} 

164 \setlength\adblfptop{0\pa \aplus If il} 

165 \setlength\adblfpsep{8\pa \@plus 2f il} 

166 \setlength\adblfpbot{0\p8 \8plus If il} 
167 

168 \endinput 



klulO.clo 
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1 . Implementation 

1 \ProvidesFile{klul0.clo>[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9.5, 9/11, 10/12, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcoimnand\normalsize{/C 



3 \@setf ontsize\normalsize\@xpt\@xiipt 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p® 

5 \abovedisplayshortskip \z(2 \(2plus 3\p@ 

6 \belowdisplayshortskip 6\p<a XOplus 3\p<a XOminusSXpO 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \iiewcommaiid\small{'/. 

11 \@setfontsize\small\@ixpt{ll}7. 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@ininus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p(§ 

14 Xbelowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmairginMef tmargini 

16 \topsep 4\p@ \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p@ \@plus\p@ \(Sminus\p@ 

18 \itemsep Vpaxsep]-"/, 

19 \belowdi splay skip \abovedi splay skip 

20 } 

21 \newcommand\f ootnotesize{% 

22 \@setf ontsizeXf ootnotesize\(§viiipt{9 . 5}-°/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \za \®plus\p@ 

25 Xbelowdisplayshortskip 3\p@ \@plus\p@ \®minus2\p@ 

26 \def\(21isti{\leftmargin\lef tmargini 

27 \topsep 3\p(S \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p(§ \@minus\p@ 

29 \itemsep Xparsep}'/. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcoiimiand\scriptsize{\(§setf ontsize\scriptsize\(3viipt\@viiipt} 

33 \rLewcommaiid\little{\@setf ontsize\little\@vipt\@viipt} 

34 \newcommaiid\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newconffliaiid\large-[\(§setf oiitsize\large\(§xiipt-[14]-} 

36 \newcomnicmd\Large{\@setf ontsize\Large\(§xivpt-[18}-} 

37 \iiewcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22>} 

38 \rLewcominaiid\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcoimnaiLd\Huge{\®setf ontsize\Huge\®xxvpt{30>} 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin}- 

42 \setlength\parindent {14\p@} 

43 \setlength\heacllieight{12\p@} 

44 \setlength\headsep {12\p@}- 

45 \setlength\topskip {10\p(§> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \ s e 1 1 engthXinar ginparpush{ 5 \p(§ > 

49 \setlength\maxdepth {.5\topskip> 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\coliiinnseprule{Opt} 

53 \setlength\f boxsep{3pt> 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDociiment{y. 

57 \setlength\@tempdima{\paperwidth}7o 

58 XaddtolengthXOtempdimai-XtextwidtW/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\(§tempdimb{2pc]-y, 

63 Xifdim XOtempdima <\@teinpdiinb 

64 \@settopoint\@tempdimb 

65 \GenericError-[Poiiitsize}{Pointsize Error: Marginpars disabled}{}-[You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\Otempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreai 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 >•/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \(9tempdimb=\paperwidth 

79 \advaiice\(§tempdimb by -4pc 

80 \@settopoint\(§tempdimb 

81 \GerLericError{Poiiitsize}-{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\(§tempdimb) . Please press X and try again. 

85 }"/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 Xevensidemeirgin XOtempdima 

These calculations are a lot easier, \textheight should have been set already. This does 
not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\(atempdima{-\f ootskip> 

91 \addtolength\(Stempdima{-\headheight> 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\(§tempdimb-[\@tempdima} 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\(§tempdimb by -4pc 

98 \@settopoint\@tempdimb 

99 \GenericError-[Pointsize}{Pointsize Error: Invalid sizes given}"[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id(§boxheight-[\(§tempdima} 

107 \advaiice\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@> 

110 \setlength{\skip\f ootins}-[9\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus IXpQ \(Sminus IXpO} 

112 \setlength{\lef tmairgini}-[2em} 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength-[\lef tmarginiv]-{l . 7em]- 

116 \setlength-[\lef tmarginv}-[lem}- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}-[.4em} 

119 \setlength-[\labelwidth}-{\lef tmargini}- 

120 \addtolength-[\labelwidth}-{-\labelsep}- 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\®listl{y. 

122 \lef tmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ XQminus 5\p<S 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p(§ \@plus 2\p@ \@minus l\p® } 

127 \def \(Slistii{"/. 

128 Meftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p(§ \@plus 2\p(3 \(§minus l\p® 

132 \pcirsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{'/. 

135 Meftmargin \lef tmarginiii 

136 Mabelwidth \leftmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \(§plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \(§plus 0\p<§ \<§minus l\p@ 

141 \itemsep \topsep} 

142 \def\01istivn 

143 \setlength-[\lef tmargin}-{\lef tmarginiv}-°/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv]-y, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \@listv[y. 

147 \setlength-[\lef tmargin}-{\lef tmarginvjy. 

148 \setlength-[\labelwidth}{\lef tmarginvjy, 

149 \addtolength-[\labelwidth}-[-\labelsep}} 

150 \def \(Slistvi{y. 

151 \setlength{\lef tmargin}-[\lef tmarginvi}% 

152 \setlength-[\labelwidth}-{\lef tmarginvijy. 

153 \addtolength-[\labelwidth}{-\labelsep}} 

154 \let\(Slisti\@listI 

155 \@listi 

1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep{12\p(§ \(§plus 2\p(§ \(§minus 2\p(§} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p(5> 

158 \setlength\intextsep{12\p@ \@plus 2\p@ \@minus 2\p@} 

159 \setlength\dblfloatsep{12\p@ \@plus 2\p(S \(Sminus 2\p(S} 

160 \setlength\dbltextf loatsep-[20\pa XOplus 2\p® XOminus 4\p@} 

Separation on float pages 

161 \setlength\9fptop{0\p(a \@plus If il> 

162 \setlength\(§fpsep{8\p(§ \(§plus 2f il> 

163 \setlength\@fpbot-[0\p(§ \(§plus If il} 

164 \setlength\@dblfptop{0\p(§ \@plus If il> 

165 \setlength\@dblfpsep{8\p@ \<Splus 2f il> 

166 \setlengtli\<adblfpbot{0\p® \@plus If il} 

167 

168 \endinput 
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1 . Implementation 

1 \ProvidesFile{klutl0.clo}[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiiiy. Allowed type provided 
values: 5/6, 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 12/14, 14/18, 17/22, 20/25, 25/30. 

2 \renewcoimnand\normalsize{/C 



3 \@setf ontsize\normalsize\@xpt{ll . 5]-7. 

4 \abovedisplayskip 10\p@ \@plus 2\p@ \@minus5\p® 

5 \abovedisplayshortskip \z(2 \(2plus 3\p@ 

6 \belowdisplayshortskip 6\p<a XOplus 3\p<a XOminusSXpO 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \iiewcommaiid\small{'/. 

11 \@setf ontsize\small\@ixpt-[10 . 5}'/. 

12 \abovedisplayskip 8.5\p(3 \@plus3\p@ \@ininus4\p@ 

13 \abovedisplayshortskip \z@ \@plus2\p(§ 

14 Xbelowdisplayshortskip 4\p@ \@plus2\p@ \@minus2\p@ 

15 \def \@listi{\lef tmairginMef tmargini 

16 \topsep 4\p(S \@plus2\p@ \@minus2\p@ 

17 \parsep 2\p(§ \@plus\p@ \(Sminus\p@ 

18 \itemsep Xpaxsep]-"/, 

19 \belowdi splay skip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{% 

22 \@setf ontsizeXf ootnotesize\(§viiipt{9}-°/, 

23 \abovedisplayskip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \za \®plus\p@ 

25 Xbelowdisplayshortskip 3\p@ \@plus\p@ \®minus2\p@ 

26 \def\(21isti{\leftmargin\lef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p(§ \@minus\p@ 

29 \itemsep Xparsep}'/. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcoiimiand\scriptsize{\(§setf ontsize\scriptsize\(3viipt\@viiipt} 

33 \rLewcommaiid\little{\@setf ontsize\little\<§vipt\@viipt} 

34 \newcommaiid\tiny{\@setf ontsize\tiny\@vpt\@vipt} 

35 \newconffliaiid\large-[\(§setf oiitsize\large\(§xiipt-[14]-} 

36 \newcomnicmd\Large{\@setf ontsize\Large\(§xivpt-[18}-} 

37 \iiewcommand\LARGE{\@setf ontsize\LARGE\@xviipt{22>} 

38 \rLewcominaiid\huge{\@setf ontsize\huge\@xxpt{25}} 

39 \newcoimnaiLd\Huge{\®setf ontsize\Huge\®xxvpt{30>} 



klutlO.clo - 1998/02/11 
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1.2. Various values 

Note that \hoff set and \voff set are both compensated. This makes the calculations 
below easier. 

40 \setlength\hof f set{-lin> 

41 \setlength\vof f set{-lin}- 

42 \setlength\parindent {14\p@} 

43 \setlength\heacllieight{12\p@} 

44 \setlength\headsep {12\p@}- 

45 \setlength\topskip {10\p(§> 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep{10pt} 

48 \ s e 1 1 engthXinar ginparpush{ 5 \p(§ > 

49 \setlength\maxdepth {.5\topskip> 

50 \setlength\@maxdepth\maxdepth 

51 \setlength\columnsep{10pt} 

52 \setlength\coliiinnseprule{Opt} 

53 \setlength\f boxsep{3pt> 

54 \setlength\f boxrule{ . 4pt} 

1.3. Textheight and textwidth 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, but our 
\textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in trouble. 
The 2pc value is used to compensate for the 'dead' corners in most laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble and 
later on in the stylefile. 

55 \newdimen\id@boxheight 

56 \AtBeginDociiment{y. 

57 \setlength\@tempdima{\paperwidth}7o 

58 XaddtolengthXOtempdimai-XtextwidtW/, 

59 \divide\@tempdima by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\@tempdimb\marginparsep 

62 \addtolength\(§tempdimb{2pc]-y, 

63 Xifdim XOtempdima <\@teinpdiinb 

64 \@settopoint\@tempdimb 

65 \GenericError-[Poiiitsize}{Pointsize Error: Marginpars disabled}{}-[You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \string\marginparwidth (\the\marginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\Otempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreai 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 
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73 >•/. 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \(9tempdimb=\paperwidth 

79 \advaiice\(§tempdimb by -4pc 

80 \@settopoint\(§tempdimb 

81 \GerLericError{Poiiitsize}-{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total \MessageBreak 

84 (Which is: \the\(§tempdimb) . Please press X and try again. 

85 }"/. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 Xevensidemeirgin XOtempdima 

These calculations are a lot easier, \textheight should have been set already. This does 
not check for the correct placement of the identification line!! 

89 \setlength\@tempdima-[\paperheight} 

90 \addtolength\(atempdima{-\f ootskip> 

91 \addtolength\(Stempdima{-\headheight> 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\(§tempdimb-[\@tempdima} 

94 \addtolength\@tempdima-[-\textheight} 

95 \divide\@tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\(§tempdimb by -4pc 

98 \@settopoint\@tempdimb 

99 \GenericError-[Pointsize}{Pointsize Error: Invalid sizes given}"[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }% 

104 \fi 

105 \setlength\topmargin{\@tempdima} 

106 \setlength\id(§boxheight-[\(§tempdima} 

107 \advaiice\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@> 

110 \setlength{\skip\f ootins}-[9\p@ \@plus 4\p@ \@minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep-[2\p@ \@plus IXpQ \(Sminus IXpO} 

112 \setlength{\lef tmairgini}-[2em} 

113 \setlength{\lef tmarginii}-[2 . 2em} 
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114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength-[\lef tmarginiv]-{l . 7em]- 

116 \setlength-[\lef tmarginv}-[lem}- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep}-[.4em} 

119 \setlength-[\labelwidth}-{\lef tmargini}- 

120 \addtolength-[\labelwidth}-{-\labelsep}- 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def\®listl{y. 

122 \lef tmargin \leftmargini 

123 \topsep 9\p@ \@plus 3\p@ XQminus 5\p<S 

124 \partopsep 3\p@ \@plus l\p@ \@minus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p@ \@minus l\p@ 

126 \parsep 4.5\p(§ \@plus 2\p@ \@minus l\p® } 

127 \def \(Slistii{"/. 

128 Meftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 4.5\p(§ \@plus 2\p(3 \(§minus l\p® 

132 \pcirsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \@listiii{'/. 

135 Meftmargin \lef tmarginiii 

136 Mabelwidth \leftmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p@ \(§plus l\p@ \@minus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \(§plus 0\p<§ \<§minus l\p@ 

141 \itemsep \topsep} 

142 \def\01istivn 

143 \setlength-[\lef tmargin}-{\lef tmarginiv}-°/, 

144 \setlength-[\labelwidth}-{\lef tmarginiv]-y, 

145 \addtolength-[\labelwidth}{-\labelsep}} 

146 \def \@listv[y. 

147 \setlength-[\lef tmargin}-{\lef tmarginvjy. 

148 \setlength-[\labelwidth}{\lef tmarginvjy, 

149 \addtolength-[\labelwidth}-[-\labelsep}} 

150 \def \(Slistvi{y. 

151 \setlength{\lef tmargin}-[\lef tmarginvi}% 

152 \setlength-[\labelwidth}-{\lef tmarginvijy. 

153 \addtolength-[\labelwidth}{-\labelsep}} 

154 \let\(Slisti\@listI 

155 \@listi 



1.5. Float separation parameters 
Separation on text pages. 
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156 \setlength\f loatsep^l2\p@ \Oplus 2\p(9 \(9minus 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\p@} 

158 \setlength\intextsep-[12\p@ \@plus 2\p(§ XOminus 2\p(§}- 

159 \setlength\dblf loatsep{12\p(S \@plus 2\p(S \(Sminus 2\p(S} 

160 \setlength\dbltextf loatsep{20\pa XOplus 2\p@ \iSminus 4\p@> 

Separation on float pages 

161 \setlength\@fptop-[0\p@ \@plus If il> 

162 \setlength\@fpsep{8\p@ \(§plus 2f il> 

163 \setlength\@fpbot{0\p(§ \(§plus If il} 

164 \setlength\@dblfptop-[0\p@ \®plus If il}- 

165 \setlength\(Sdblfpsep{8\p<§ \(Splus 2f il} 

166 \setlength\@dblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutll.clo}[\filedate ] 
1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 
provided values: 6/7, 7/8, 8/9, 9/10.5, 10/11.5, 11/12.5, 12/14, 14/18, 17/22, 
20/25, 25/30. 

2 \renewcoinmcind\normalsize-[°/o 



3 \(3setf ontsize\normalsize\(3xipt{12 . S}"/, 

4 \abovedisplayskip 10\pQ XOplus 2\pQ \Qininus5\pQ 

5 \abovedisplayshortskip \z@ \@plus 3\p@ 

6 \belowdisplaysh.ortskip 6\p@ \@plus 3\p@ \@ininus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\@listi\@listl} 
9 \normalsize 

10 \newcommeiiid\small-C7o 

11 \@setf ontsize\small\@xpt{ll . 5}% 

12 \abovedisplayskip 9\p@ \@plus3\p@ \(§minus4\p@ 

13 \abovedisplayshortskip \zQ \Qplus2\pQ 

14 \belowdisplayshortskip 5\p@ \(§plus2\p@ \@ininus2\p@ 

15 \def \@listi{\lef tmargin\lef tmargini 

16 \topsep 4\p(S \@plus2\p(S \(Sminus2\p(a 

17 \parsep 2\p@ \@plus\p@ \@minus\p(§ 

18 \itemsep Xparsep}"/ 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newcommand\f ootnotesize{°/o 

22 \(Ssetf ontsizeXf ootnotesize\Qixpt{10 . 5}°/, 

23 \abovedi splay skip 6\p@ \@plus2\p@ \@minus4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\pQ \Qplus\pQ \(SinirLus2\p(a 

26 \def \@listi{\leftinargin\leftmargini 

27 \topsep 3\p(§ \@plus\p@ \@minus\p@ 

28 \parsep 2\pQ \(3plus\pS \(3minus\p@ 

29 \itemsep \parsep}7. 

30 \belowdi splay skip \abovedisplayskip 

31 } 



32 \newcommand\scriptsize{\@setf ontsize\scriptsize\@viiipt{9 . 5}} 

33 \newcommand\little{\@setf ontsize\little\@viipt\(§viiipt3■ 
34 \newcommELnd\tiny{\@setf ontsize\tiiiy\(Svipt\(Sviipt}- 

35 \newcoinmaiid\large-[\@setf ontsize\large\@xiipt{14}} 

36 \newcommand\Large{\@setf ontsize\Large\(§xivpt{18}]■ 
37 \newcommand\LARGE{\asetf ontsize\LARGE\(axviipt{22}} 
38 \iiewcoinmaiid\huge{\@setf ontsize\huge\@xxpt{25» 
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39 \newcoinmaiid\Huge{\@setf ontsize\Huge\@xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the 
calculations below easier. 

40 \setleiigth\hof f set{-liii> 

41 \setlength\vof f set{-lin]- 

42 \setlength\parindent {14\p(a} 

43 \setleiigth\headheight{12\pQ} 

44 \setlength\headsep {12\p(a} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p(a} 

47 \setlength\marginparsep{10pt} 

48 \setlength\marginparpush{5\p(§} 

49 \setlength\maxdepth { . 5\topskip} 

50 \setlength\Qiiiaxdepth\maxdepth 

51 \setlength\coluinnsep{10pt} 

52 \setleiigth\columnseprule{Opt} 

53 \setleiigth\f boxsep{3pt} 

54 \setlength\fboxrule-C.4pt} 

1.3. Textheight and TEXTWIDTH 

These are the main reason for the existence of these files. For some stupid reason, 
I^T[^ calculates textwidth out of \paperwidth. We did want to support letter 
paper, but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and Xmarginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserpr inters. 

Calculations arc done 'AtBeginDocument' to allow changes made in the preamble 

and later on in the stylefile. 

55 \newdimen\idQboxheight 

56 \AtBeginDocument{% 

57 \setlength\@tempdima{\paperwidth}7o 

58 \ addt o 1 ength\(3t empdima{ - \t extwi dth)-"/, 

59 \divide\@teinpdiina by 2 

60 \setlength\@tempdimb\marginparwidth 

61 \addtolength\Qtempdimb\marginparsep 

62 \addtolength\@teinpdiinb{2pc}°/. 

63 Xifdim \(§tempdima <\@tempdimb 

64 XOsettopointXQtempdimb 

65 \GenericError-[Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 
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66 your \string\textwidth\space (\the\textwidth) and 

67 \string\inarginparwidth (\the\inarginparwidth) too wide . \MessageBreak 

68 The allowed value for margin space: (\the\@tempdima) . Needed value: 

69 (\the\Otempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 YL 

74 \marginparwidth \z@ 

75 \marginparsep \z(§ 

76 \fi 

77 \ifdiin \@tempdima <2pc 

78 \®tempdimb=\paperwidth 

79 \adveince\Qtempdimb by -4pc 

80 \®settopoint\®tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total NMessageBreeik 

84 (Which is: \the\®tempdimb) . Please press X and try again. 

85 }7. 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. 
This does not check for the correct placement of the identification line!! 

89 \ s et length\@t empdima{ \paperhe ight } 

90 \addtolength\@tempdima{-\f ootskip} 

91 \addtolength\(atempdima{-\headheight)- 

92 \addtolength\<§tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima]- 

94 \ addt o 1 ength\ Ot empdima{ - \t ext he ight )■ 

95 \divide\®tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\Qtempdimb by -4pc 

98 \@settopoint\Otempdimb 



99 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}-[}-{You 

100 made your \string\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }•/. 



104 \fi 

105 \setlength\topmargin{\9tempdima}- 

106 \setlength\id(aboxheight{\(Stempdima}- 

107 \advance\id@boxheight by -2pc 

108 } 



5 



109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength-C\skip\f ootins}{9\p9 \Qplus 4\p(a XOminus 2\p(a} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ NQminus l\p@} 

112 \setlength-[\lef tniargini}-{2em3- 

113 \setlength{\lef tmarginii}-[2 . 2em} 

114 \setlength{\lef tmarginiii}{l . 87em} 

115 \setlength-[\lef tinarginiv}{l . 7ein} 

116 \setlength{\lef tmarginv}{lein} 
117 \setlength{\lef tmarginvi}{lem} 

118 \setlength-[\labelsep>{.4ein} 

119 \setlength{\labelwidth>{\leftmargini} 

120 \addtoleiigth{\labelwidth}{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. 
This results in very small labels for the inner lists. 

121 \def \(aiistl{% 

122 Xleftmargin \lef tmargini 

123 \topsep 9\p@ \@plus 3\p@ \@minus 5\p@ 

124 \partopsep 3\p(S \@plus iXpQ XQminus 2\p@ 

125 \itemsep 4.5\p@ \@plus 2\p(§ XOminus l\p@ 

126 \parsep 4.5\p@ \(§plus 2\p(§ XQminus l\p(§ > 

127 \def \(aiistii{% 

128 \leftmargin \lef tmarginii 

129 \labelwidth \lef tmarginii 

130 \adveince\labelwidth by -\labelsep 

131 \topsep 4.5\p@ \(Splus 2\p@ \@minus l\p(§ 

132 \parsep 2\p@ \@plus l\p@ \@minus l\p@ 

133 \itemsep \parsep} 

134 \def \(§listiii{% 

135 Meftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p(a \@plus l\p@ \(§minus l\p@ 

139 \parsep Xz® 

140 \partopsep l\p@ \(§plus 0\p® \@minus l\p(§ 

141 \itemsep \topsep)- 

142 \def \(aiistiv-[% 

143 \setlength{\leftmargin}{\lef tmargini v>°/. 

144 \setlength{\labelwidth}{\lef tmarginiv}"/, 

145 \addtolength{\labelwidth}{-\labelsep}} 

146 \def \@listv{°/. 
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147 \setlength{\lef tmargin}{\lef tmarginv}"/ 

148 \setlength{\labelwidth}{\leftinarginv>°/. 

149 \addtolength{\labelwidth}{-\labelsep}} 

150 \def \@listvi{7. 

151 \setlength{\lef tmargiii}{\lef tinarginvi}°/o 

152 \setlength{\labelwidth}{\leftmarginvi}°/. 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\(aiisti\(aiistl 
155 \®listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p® \@iniiius 2\p@} 

157 \setlength\textf loatsep{20\p@ \@plus 2\p@ \@minus 4\pa} 

158 \setlength\intextsep{12\pQ \(§plus 2\p@ XOminus 2\p(§} 

159 \setlength\dblf loatsep{12\p(S \Qplus 2\p(a NQminus 2\p@} 

160 \setleiigth\dbltextf loatsep{20\p@ \@plus 2\p(§ \@minus 4\p(§} 

Separation on float pages 

161 \setlengtli\@fptop{0\p@ \(Splus If il> 

162 \setlength\@fpsep{8\p@ \(§plus 2f il} 

163 \setlength\@f pbot{0\p@ \@plus If il} 

164 \setlengtli\@dblf ptop{0\p@ \@plus Ifil} 

165 \setlengtli\@dblfpsep{8\p@ \@plus 2f il} 

166 \setlength\(adblfpbot{0\pa \@plus Ifil} 
167 

168 \endinput 
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1. Implementation 

1 \ProvidesFile{klutl2.clo>[\filedate ] 

1.1. Section size commands 

added command: \little. This between \scriptsize and \tiny. Allowed type 

provided values: 6/7, 8/9, 9/10.5, 10/11.5, 11/12.5 12/13.5, 14/18, 17/22, 20/25, 
25/30. 



2 \renewcoimnand\normalsize{°/o 

3 \@setf ontsize\normalsize\@xiipt{13 . 5}% 

4 \abovedisplayskip ll\p@ \@plus 2\p@ \@miiius5\p@ 

5 \abovedisplayshortskip l\p@ \(3plus 3\p@ 

6 \belowdisplayshortskip 7\p@ \(§plus 3\p@ \@minus3\p@ 

7 \belowdisplayskip \abovedisplayskip 

8 \let\(§listi\(§listl> 
9 \normalsize 

10 \iiewconunand\small{y„ 

11 \@setf ontsize\small\@xipt{12 . 5}% 

12 \abovedisplayskip 8.5\p@ \@plus3\p@ \@ininus4\p@ 

13 \abovedi splay short skip \z@ \@plus2\p@ 

14 \belowdisplayshortskip 4\p@ \@plus2\p@ \(§minus2\p(§ 

15 \def \@listi{\lef tmarginMef tmargini 

16 \topsep 4\p@ \@plus2\p@ \(§minus2\p(§ 

17 \parsep 2\p@ \@plus\p@ \@minus\p@ 

18 \itemsep \parsep}7o 

19 \belowdisplayskip \abovedisplayskip 

20 } 

21 \newconunand\f ootnotesize{°/o 

22 \@setf ontsizeXf ootnotesize\@xpt{ll . 5}% 

23 \abovedisplayskip 6\p@ \(§plus2\p(§ \@miiius4\p@ 

24 \abovedisplayshortskip \z@ \@plus\p@ 

25 \belowdisplayshortskip 3\p@ \@plus\p@ \(§minus2\p(§ 

26 \def \@listi{\lef tmarginXlef tmargini 

27 \topsep 3\p@ \@plus\p@ \@minus\p@ 

28 \parsep 2\p@ \@plus\p@ \@minus\p@ 

29 \itemsep Xparsep}"/, 

30 \belowdisplayskip \abovedisplayskip 
31} 

32 \newconunand\scriptsize{\@setf ontsize\scriptsize\@ixpt{10 . 5}}- 

33 \newcommand\little{\@setf oiitsize\little\@viiipt{9}} 

34 \newcominaiid\tiny{\@setf ontsize\tiny\@vipt\@viipt} 



3 



35 \newconimand\large{\@setf ontsize\large\@xivpt{18}} 

36 \newcommand\Large{\@setf oiitsize\Large\@xviipt{22}} 

37 \newcoimnand\LARGE{\@setfontsize\LARGE\@xxpt{25}} 

38 \newconmiaiid\huge{\@setf ontsize\huge\@xxvpt{30}} 

39 \newcominand\Huge{\@setf ontsize\Huge\(§xxvpt{30}} 

1.2. Various values 

Note that \hoffset and \voffset are both compensated. This makes the calcula- 
tions below easier. 

40 \setlength\hoff set{-lin} 

41 \setlength\vof f set-[-lin} 

42 \setlength\parindent {14\p@} 

43 \setlength\headheight-Cl2\p@> 

44 \setlength\headsep {12\p@} 

45 \setlength\topskip {10\p@} 

46 \setlength\f ootskip {27.5\p@} 

47 \setlength\marginparsep-[10pt} 

48 \setlength\marginparpush{5\p@} 

49 \setlength\maxdepth {.5\topskip} 

50 \setlength\@iiiaxdepth\maxdepth 

51 \setlength\columnsep{12pt} 

52 \setlength\coliimnseprule{Opt} 

53 \setlength\fboxsep{3pt]- 

54 \setlength\fboxrule{.4pt]- 

1.3. Textheight and TEXTWIDTH 

These are the main reason for the existence of these files. For some stupid reason, 
calculates textwidth out of \paperwidth. We did want to support letter paper, 
but our \textwidth is fixed, with the margins being calculated. 

Presume \textwidth and \marginparwidth are set in the stylefile, or we're in 
trouble. The 2pc value is used to compensate for the 'dead' corners in most 
laserprinters. 

Calculations are done 'AtBeginDocument' to allow changes made in the preamble 
and later on in the stylefile. 

55 \newdimen\idOboxheight 

56 \AtBeginDocuinent{yo 

57 \setlength\(§tempdima{\paperwidth}yo 

58 \addtolength\(§tempdima{-\textwidth}°/o 
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59 \divide\@tenipdinia by 2 

60 \setleiigth\Otempdimb\marginparwidth 

61 \addtoleiigth\@tempdimb\marginparsep 

62 \addtolength\@teiiipdimb{2pc}7o 

63 \ifdim XOtempdima <\@tempdimb 

64 \@settopoint\@tempdiinb 

65 \GenericError{Pointsize}{Pointsize Error: Marginpars disabled}{}{You made 

66 your \string\textwidth\space (\the\textwidth) and 

67 \striiig\inargiiiparwidth (\the\marginparwidth) too wide . \MessageBreaJi 

68 The allowed value for margin space: (\the\(§tempdima) . Needed value: 

69 (\the\@tempdimb) . \MessageBreak 

70 This is not enough, 

71 so I will set \string\marginparwidth\space to Opt . \MessageBreak 

72 Let's hope that fixes it. 

73 }% 

74 \marginparwidth \z@ 

75 \marginparsep \z@ 

76 \fi 

77 \ifdim \@tempdima <2pc 

78 \@tempdimb=\paperwidth 

79 \advaiice\@tempdimb by -4pc 

80 \@settopoint\@tempdimb 

81 \GenericError{Pointsize}{Pointsize Error: Invalid sizes given}{}-{You 

82 made your \string\textwidth\space (\the\textwidth) 

83 wider than the available total\MessageBreak 

84 (Which is: \the\@tempdimb) . Please press X and try again. 

85 }% 

86 \f i 

87 \oddsidemargin \@tempdima 

88 \evensidemargin \@tempdima 



These calculations are a lot easier, \textheight should have been set already. This 
does not check for the correct placement of the identification line!! 

89 \setlength\(§tempdima{\paperheight3- 

90 \addtolength\Otempdima{-\f ootskip} 

91 \addtolength\@tempdima{-\headheight} 

92 \addtolength\@tempdima{-\headsep} 

93 \setlength\@tempdimb{\@tempdima]- 

94 \addtolength\(§tempdima{-\textheight} 

95 \divide\(§tempdima by 2 

96 \ifdim \@tempdima <2pc 

97 \advance\Otempdimb by -4pc 

98 \@settopoint\©tempdimb 
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99 \GenericError{Pointsize]-{Pointsize Error: Invalid sizes given}{}{You 

100 made your \striiig\textheight\space (\the\textheight) 

101 more than the available total . \MessageBreak 

102 (Which is: \the\@tempdimb) . Please press X and try again. 

103 }7o 

104 \fi 

105 \ s et length\t opmargin{ \@t empdima} 

106 \setlength\id@boxheight{\@t empdima} 

107 \advance\id@boxheight by -2pc 

108 } 

109 \setlength\f ootnotesep{6 . 65\p@} 

110 \setlength{\skip\f ootins}{12\p@ \@plus 4\p@ \(§minus 2\p@} 

1.4. Lists 

List default values 

111 \setlength\partopsep{2\p@ \@plus l\p@ \Ominus l\p@} 

112 \setlength{\lef tmargini}{2em]- 

113 \setlength{\lef tmarginii}{2 . 2em} 

114 \setlength{\lef tmarginiii}{l .87em} 

115 \setlength{\lef tmarginiv}{l . 7em} 

116 \setlength{\lef tmarginv}{lem]- 

117 \setlength{\lef tmarginvi}{lem} 

118 \setlength{\labelsep>{.4em} 

119 \setlength{\labelwidth}{\lef tmargini} 

120 \addtolength{\labelwidth>{-\labelsep} 

Note that lists below level 3 do nothing else then readjusting the \labelwidth. This 
results in very small labels for the inner lists. 

121 \def \(§listl{% 

122 Meftmargin \leftmargini 

123 \topsep ll\p@ \(§plus 3\p@ \@minus 5\p@ 

124 \partopsep 4.5\p@ \@plus l\p@ \Ominus 2\p0 

125 \itemsep 6\p@ \Oplus 2\p(§ \@minus l\p@ 

126 \parsep 6\p@ \@plus 2\p(§ \@minus l\p@ } 

127 \def \©listii{% 

128 Meftmargin \lef tmarginii 

129 Mabelwidth \lef tmarginii 

130 \advance\labelwidth by -\labelsep 

131 \topsep 6\p@ \Oplus 2\p0 \@minus l\p@ 

132 \parsep 3\p@ \@plus l\p(§ \@minus l\p@ 
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133 \itemsep \parsep} 

134 \def \®listiii{y. 

135 \leftmargin \lef tmarginiii 

136 \labelwidth \lef tmarginiii 

137 \advance\labelwidth by -\labelsep 

138 \topsep 2\p(§ \(§plus iXpO \(§niinus l\p@ 

139 \parsep \z@ 

140 \partopsep l\p@ \@plus 0\p© \Ominus l\p© 

141 \itemsep \topsep} 

142 \def \@listiv{y. 

143 \setleiigth{\lef tmargin}{\lef tmarginiv}"/, 

144 \setlength{\labelwidth}{\lef tmarginiv}yo 

145 \addtolength{\labelwidth}{-\labelsep» 

146 \def \@listv{% 

147 \setlength{\lef tmargin}{\leftmarginv}yo 

148 \setlength-[\labelwidth}{\leftmarginv}°/o 

149 \addtolength{\labelwidth}{-\labelsep» 

150 \def \©listvi{°/. 

151 \setlength{\lef tniargin}{\leftmarginvi}°/o 

152 \setlength{\labelwidth>{\leftmarginvi>% 

153 \addtolength{\labelwidth}{-\labelsep}} 

154 \let\@listi\©listl 

155 \©listi 

1.5. Float separation parameters 
Separation on text pages. 

156 \setlength\f loatsep{12\p@ \@plus 2\p@ \@minus 2\p@> 

157 \setleiigth\textf loatsep{24\p@ \@plus 2\p© \@iiiinus 4\p(a} 

158 \setleiigth\intextsep{12\p@ \@plus 2\p@ \@minus 2\p(3> 

159 \setlength\dblf loatsep{12\p@ \(§plus 2\p@ XOminus 2\p@} 

160 \setlength\dbltextf loatsep{24\p(§ \@plus 2\p@ \(§minus 4\p(§} 

Separation on float pages 

161 \setlength\@fptop{0\p@ \(§plus If il> 

162 \setlength\0fpsep{10\p@ \Oplus 2f il> 

163 \setleiigth\@fpbot{0\p@ \@plus If il} 

164 \setlength\@dblfptop{0\p@ \@plus If il} 

165 \setlength\@dblfpsep{10\p@ \@plus 2f il} 

166 \setlength\Odblfpbot{0\p@ \@plus If il} 
167 

168 \endinput 
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Abstract. The optimal performance of adaptive optics systems can only be maintained if the 
wavefront reference is bright and compact. Experience has shown that both of these important 
criteria are remarkably difficult to achieve with laser guide stars, and this contribution gives 
an account of the methods by which ALFA attempts to reach them. First, the production 
' of a high quality, high power laser beam is described. However, this quality is unavoidably 

compromised along the path to the launch telescope. In order to rectify this, a new set of 
diagnostic tools which monitor the quality of the out-going beam has been installed, and these 
are also described. Lastly, we outline a number of possible modifications on which we are 
working. If successful, these may allow a substantial improvement in the beam quality. 



Oh' Keywords: adaptive optics, laser guide star, atmospheric turbulence 
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1. Introduction 



^ ' The aim of the ALFA laser guide star (LGS) is the generation of an arti- 

. ficial reference star for the adaptive optics (AO), in order to increase the 

sky coverage of the system. For best results the Shack-Hartmann sensor of 
the AO system needs a sufficiently bright compact source to obtain centroid 
measurements with a good signal-to-noise ratio. So the main objective is: how 
to get the brightest and smallest LGS image on the wavefront sensor. The 
heart of the ALFA laser facility is an argon ion pumped dye jet laser, which 
is installed in the coude lab at the Calar Alto 3.5-m telescope. The laser emits 
light at the wavelength of the sodium D2 line with an output power up to 4 W, 
with extremely high beam quality. In order to create an artificial guide star 
in the mesospheric sodium layer, the laser beam is transported from the laser 
laboratory along the coude path of the 3.5-m to a Galilean beam expander 
near the main mirror of the telescope, where it is finally launched (see Ott et 
al., this issue). Along this path, a distance of approximately 50 m, the laser 
is subjected to the disturbing influence of the turbulent air inside the dome 
and other distortion sources, so that the beam quality is significantly worse 
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Figure 1. Laser spot and natural guide stars imaged on the wave front sensor under different 
conditions: A) LGS in good transparency B) NGS with the same conditions as (A) and mv=9.4 
C) LGS while observing the laser through clouds D) NGS with the same conditions as (C) with 
mv=9.0. 

than when it leaves the coude lab. The aberrations can affect the brightness 
and compactness of the laser guide star, as shown in Figure 1, which are so 
critical to the performance of the adaptive optics (see Davies et al., this issue). 
A series of diagnostic tools have therefore been installed directly beneath the 
launch telescope to allow monitoring of the quality of the projected beam. 



2. The Laser 

The main component of the ALFA laser system is a Coherent 899 ring dye 
laser, pumped by a Coherent INNOVA 200 Argon ion laser. These lasers, 
together with optics for beam forming and diagnostics, are mounted on a 
floated optical bench (Figure 2) in a separate room on the coude floor, and 
shielded with removeable covers. Above the dye laser a laminar flow box is 
installed to prevent the sensitive resonator components from contamination 
by, for example, dust in the air. The laser room is equipped with an air condi- 
tioning system to stabilize the air temperature to 20±1°C independent of the 
environmental conditions. 

The lasing medium in the ring dye laser is Rhodamine 6G (Rh6G). For 
exiting Rh6G, intense blue or green hght is necessary. Today only continuous 
wave ion lasers are able to produce high enough power in that wavelength 
regime in a good single-spatial mode. The quahty of the pump laser (power 
stability, mode structure) is important because the dye laser output is influ- 
enced by the input of the pump laser as well as the flow characteristics of 
the dye jet. The multiline output of the ALFA pump laser consists of eight 
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Figure 2. Layout of the 1.2mx2.4m laser optical bench in the coude lab. On the left is the 
Ar+ laser. Some of the output is used for alignment, but most pumps the dye laser. A small 
part of the dye laser output is used for frequency tuning and the rest passes through a shutter, 
quarter-wave plate, and pre-expander before being fed along the coude train. 



lines from 457.9-514.5 nm which lase simultaneously so that, although their 
relative line strengths are not ideally matched to the absorption band of Rh6G, 
the power output is maximised. 

The pump laser provides 27 W of multi-line output, about 2 W of which is 
fed directly into the coude train to be used as a pilot beam for alignment, and 
the rest pumps the dye ring laser. This is sufficient for a dye laser output 
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of typically 3.8 W, with single spatial and temporal mode quality. Higher 
powers (up to 5.5 W) can be achieved but at the cost of considerably higher 
maintenance overheads (Quirrenbach et al., 1997). 

2.1. Argon-Ion PUMP LASER 

The cavity of the pump laser consists of a low pressure plasma tube with 
ionized argon gas as the active lasing medium positioned between one flat 
high reflector and one curved output coupler. The adjustable high reflector 
is sealed onto the plasma tube. Between the front Brewster window and 
the output coupler there are an intracavity aperture, a manual shutter and a 
beamsplitter for power monitoring. The intracavity aperture is adjusted for 
the largest aperture diameter that provides the highest output power (for a 
given tube current) with a Gaussian TEMqo mode. 

The plasma tube of the pump laser is cooled in a closed loop water cooling 
system (flow rate 251min~^). The heat exchanger, as well as the chiller for 
the dye solution are installed in the water supply cabin which is adjacent to 
the laser lab to prevent interference with the running system. The water tubes 
are shielded by separate pipes which can withstand a tube leakage, and are 
mounted under the floor of the laser cabin. 

The microprocessor controlled power supply of the pump laser provides 
the DC current for the tube and its axial electro-magnet, and is equipped with 
a circuit breaker and a 480/380 V transformer. It is located in different room 
and monitors safety interlocks (covers, water flow) and diagnoses system 
faults. Communication is either via a serial Unk or with a remote control 
module. 

During normal operation of the system, the pump laser status, its tube 
current, tube voltage, and output power are monitored continuously using a 
serial line. Changing any of these parameters is only possible using the remote 
control module which is located next to the pump laser in the laser laboratory, 
so as to prevent damage from excessive tinkering. 

2.2. Ring Dye Laser 

The basic design of any continuous wave dye laser is constrained by the 
photophysics and chemistry of the dissolved organic dye molecules, which 
represent the active laser medium. The absorption and emission spectra of 
dissolved dye molecules are broadband features, a result of the fact that in 
a dye solution the closely spaced rotational-vibrational levels are heavily 
collision broadened such that they overlap. The absorption band at lower 
frequencies is nearly the mirror image of the emission band, and the exact 
peak position of these bands depend on the solvent and dye concentration. 

The broadening of the gain of organic dyes is both a blessing and a curse. 
It is a blessing in the sense that in the case of homogenous broadening all 
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of the gain medium can contribute power to the oscillating laser mode, and 
because the broad emission spectrum provides the laser's tunability. It is a 
curse because the broad spectral width means that the lifetime of the excited- 
state is short and hence intense pump powers are required in order to achieve 
sufficient population inversion for the laser oscillation. 
The major elements of the ring dye laser are: 

— The resonator which is a figure-8-shaped ring, formed with 3 spherical 
mirrors and one flat output coupler with 10% transmission 

— A curved mirror which focuses the pump light into the free flowing dye 
jet stream, which is the active medium of the dye laser 

— The dye circulator which cools, filters and pumps the dye solution 

Because of the heat produced in the dye by the focused pump light which 
is not re-radiated as fluorescence and also because of triplet-state trapping, it 
is necessary to have the dye molecules traverse the pump spot very rapidly. 
The excited dye molecules can decay into both singlet- and triplet-states. But 
due to the much longer hfetime of the triplet-states, these act as a trap for 
the excited dye molecules, which are then no more available for the lasing 
process. Therefore the flow velocity at the output of the jet-forming nozzle 
of the dye laser is such that the dye molecules stay only in the pump spot for 
a time similar to the triplet-lifetime. Additionally, triplet-state trapping can 
further be quenched chemically by adding some amount of cyclo-octatetraene 
(COT) to the dye solution. 

The dye solution is kept at a constant temperature with a chiller installed 
in the water supply cabin. The materials coming into contact with the dye in 
the circulation system (stainless steel, teflon) are chosen such that they do not 
influence the lifetime of Rh6G, which is therefore subject to degradation only 
due to pump-laser heating and laser-induced photochemistry. 

The transmitted fraction of the pump light (several Watts) falls onto a 
water-cooled beam-stop in the dye laser head. The pump laser shutter is 
automatically closed in case of a failure of the dye circulation system. 

A number of modifications (dye solvent, flow velocity, temperature, pump 
focus spot size, etc.) to the original design, aimed at optimising the output 
power were made and are elaborated in Quirrenbach et al. (1997). 

2.3. Output Beam 

In order to provide efficient excitation of the sodium in the mesosphere, 
the laser must have a single spatial and temporal mode quality. The former 
criterion is achieved by ensuring that the pump lases only in the Gaussian 
TEMoo mode. The latter is attained with a pair of low-finesse etalons and a 
birefringent filter, which restrict the bandwidth to about 10 MHz; it can also 
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Frequency scan of the optical pumped Na-D2 line 
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Figure 3. Returned photons (LGS brightness) as a function of frequency, during a scan across 
the Na D2 line. The fitted curves (representing the absorption of the two transitions in the 
doublet) have a ratio of 3.8 rather than the expected 1.7 — indicating that the laser is very 
effective at pumping the lower energy transition. 



be tuned using the scanning Brewster plate and a piezo-mounted mirror (M3 
in Figure 2). Although in principle it is possible to reduce the bandwidth to 
~1 MHz, this is unnecessary since the radiative lifetime due to spontaneous 
emission from the 3P level of the atom is 16 ns, giving a natural (homoge- 
nous) linewidth of almost exactly 10 MHz. The tuning is stabilised using a 
reference cavity, to which 1.4% of the beam power is diverted. This compares 
the directly-measured flux in the beam to that passing through a temperature- 
and pressure-controlled etalon. It is designed so that the 589.2 nm line lies 
at the half-maximum transmission of one of the etalon orders, providing a 
monotonic relation between beam frequency and transmitted power. For ab- 
solute frequency tuning and long-term stabilisation the cavity is locked to the 
Lamb dip in the fluorescence signal from a sodium cell. Thus the laser can be 
de-tuned away from the Na line for diagnostic purposes. 
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Scanning the laser across the frequencies over which sodium fluorescence 
is expected to occur shows an intriguing result. It is well known that the 
589.2 nm line is a doublet with separation 1 .77 GHz, and that the lower energy 
transition has a doppler-broadened absorption cross-section greater by a fac- 
tor of 1.7. The frequency scan in Figure 3 reflects this, but with an absorption 
cross-section ratio of nearly a factor 4; the laser is very effective at pumping 
this transition. 

The next component on the optical bench is a shutter (lower right in Fig- 
ure 2) which allows the laser to be shut off in an emergency, when an aircraft 
is detected or when moving the telescope or dome. 

The output from the dye laser is plane-polarised, and at this stage a quarter- 
wave plate circularly polarises it. This is an important issue because, as men- 
tioned above, the ground state of the Na atom is split into a doublet 
with a separation much greater than the laser line-width. The laser is tuned 
to excite atoms from the higher F = 2 angular momentum level (with peak 
absorption into 3P ^" = 3). Since they can decay back to either the F = \ 
or F = 2 levels, after a few cycles the whole population will reside in the 
F = 1 level, resulting in a significant loss of pump efficiency even though 
the atoms are replenished by high altitude winds. On the other hand, if the 
laser beam is circularly polarised so that it imparts angular momentum to 
the atoms, they will tend to decay back to the F = 2 level, increasing the 
efficiency. Measurements by (Ge et al., 1997; Ge et al., 1998) at the MMT 
have shown that the brightness of a compact LGS can be increased by 30% 
in this way. There are two restrictions on the gains we can achieve. Firstly, 
between the coude lab and the launch telescope there are many reflections so 
that the final polarisation state of the beam is uncertain, probably elliptical. 
Secondly, polarisation only becomes an important issue if the beam is close 
to saturating the Na layer, otherwise the loss of atoms from the F = 2 state 
is a minor effect. Nevertheless, the first results, given in Section 3.5 are very 
convincing. 

In the last part of the laser optical bench the beam is pre-expanded to 
15-30 mm diameter, and it is then fed into the coude train. 



3. Beam Diagnostics 

In traversing the beam relay from the coude lab to the launch telescope, the 
beam suffers power loss and wavefront aberrations from multiple reflections 
and dome turbulence. It is therefore essential to monitor the quality of the 
projected beam immediately prior to its launch. For this reason, a diagnostics 
bench has been installed directly beneath the launch telescope. 

Before describing the individual components, it is worth mentioning the 
general layout of the system which is shown in Figure 4. For the different 
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tasks the instruments have to be fed with light from the laser beam, but 
without disturbing the propagation to the launch telescope and without no- 
ticeably reducing the power. For this purpose the analysis is performed on 
a small amount of light which is split off with a high quality, antireflection 
coated optical wedge plate at the center of the optical bench; and the po- 
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larization detector, which is mounted at the top of the beam expander, is 
built as small as possible. The diverted beam feeds all instruments which 
are continuously needed for beam control and online measurements. Several 
mirrors are mounted on a linear stage and can be moved into the laser beam, 
to do measurements that are only needed from time to time. Because the 
diameter of the laser can be adapted with a pre-expander in the coude lab to 
different seeing conditions, the instruments have been designed so that they 
are not influenced by these changes. 

3.1. Position MEASUREMENT 



powerspectrum tip-tilt 
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Figure 5. Left: Jitter in the laser beam measured at the diagnostics bench over a period of 10 s, 
with the beam-relay control loop open. Right: power spectrum showing that the worst jitter 
occurs with frequencies less than a few Hertz. Note that after expanding the beam through the 
launch telescope, the angular deviations are reduced by the expansion factor. 

Operation of the laser guide star requires the laser to remain steady on the 
optical axis of the launch telescope, but several different influences can affect 
this: 

1 . Errors can occur when feeding the beam into the coude path. 

2. The coude path changes while the telescope is tracking. 

3. Turbulence in the dome may cause fast deviations in the beam position. 

4. There will be some flexure in the telescope structure and instabilities of 
mechanical components. 

To minimize beam degradation due to these effects, active control of the beam 
position is needed. As discussed in Ott et al. (this issue), the beam path is 
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equipped with four fast steering mirrors to keep the laser on the optical axis. 
As well as these, to position the laser accurately on the optical axis of the 
launch telescope, detectors for all four degrees of freedom are installed at the 
analysis bench. One two dimensional PSD at the focus of a 1 m focal length 
lens is capable of measuring angular deviations down to 0.4". The x-y posi- 
tion is measured with a triple prism splitter, positioned out of the focal plane 
of a short focal length lens, acting rather like a quad-cell. In addition a further 
PSD at a 100 mm focus is used for coarse alignment, in case the laser is moved 
out of the field of view of the other much more sensitive detectors. To provide 
an absolute reference, a helium-neon laser is aligned to the optical axis of 
the launch telescope, so the detectors can be calibrated with the signal from 
this light. Measurements of the laser movement and tip-tilt measurements of 
the back scattering from the mesospheric sodium can be compared with the 
help of these tools, and a distinction between the influences of atmospheric 
turbulence and the turbulence in the telescope dome is possible. An example 
of the tip-tilt movement and the power spectrum (with the beam relay control 
loop open) is given in Figure 5. 

3.2. Power 

From the laser laboratory to the launch telescope 6 mirrors and 3 windows 
are installed in the telescope dome. Due to dust the mirrors surface quality 
tends to degrade with time, so the overall transmission of the relay system 
decreases. To have a monitor for this and to know the absolute power of the 
light propagating upward, a bolometric power meter is installed, to which 
the laser can be fed with the help of a dielectric, spherical mirror on the 
linear stage. Because this power measurement is not in use permanently an 
additional photo diode serves as a relative online power monitor. The typical 
power of the laser at the launch telescope is about 2.5 W, according to an 
overall transmission of the relay path of 60%. But this number may vary from 
50% with strong dust coverage, to 75% with freshly cleaned mirrors. 

3.3. Shearing interferometer 

The diameter of the laser is adapted to the actual seeing conditions with a 
beam expander at the laser lab, requiring the beam to be re-coUimated after 
every adjustment. In order to do this quickly and easily, another mirror at 
the linear stage can reflect the light to a shearing interferometer which is 
watched by a camera. The angle of the fringes indicates how well coUimated 
the beam is, with perfect colUmation occuring when they lie parallel to the 
dark line bisecting the interferogram, as in Figure 6. In addition, the shape of 
the fringes indicates whether abnormal static distortions are present; in this 
case they suggest significant aberrations arising from optical elements in the 
beam path, such as the window at the end of the pipe from the coude lab. 
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Figure 6. Fringes on the Shearing interferometer at 3 stages (left to right) during beam col- 
limation. When the fringes are aligned parallel to the dark line bisecting the interferogram, 
collimation is perfect. Additionally, the dominant high-order aberrations can be recognised 
easily from the shape of the fringes. 
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Figure 7. An example of the wavefront gradients in the up-going laser, measured with a 
Shack-Hartmann sensor. Left: the pattern of spots on the WFS; Right: residual gradients after 
tip-tilt has been removed. 



3.4. Wavefront sensing and beam profile 

For the higher orders of the wavefront distortion we have installed a Shack- 
Hartmann sensor at one analysis beam. The sensor consists of a lenslet array 
in a coUimated beam of 3-5 mm with arrays of 3x3 to 11x11 subapertures, 
one relay lens, one neutral density filter and a CCD camera in the focal plane. 
With this sensor, direct measurements of the dynamic wavefront distortions 
can be made before the laser is finally launched (static aberrations cannot be 
measured due to lack of a suitable reference beam). Preliminary measure- 
ments, such as those in Figure 7, showed an unexpectedly large distortion 
which reached mean values of up to 0.7X (at 589 nm). However, more recent 
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Polarization dependence of the retiim fiiix iTom the mesospheric sodium layer 
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Figure 8. Counts measured in the LGS as a function of polarisation, from linear on the left of 
each figure, to circular on the right. The two figures show the same experiment performed on 
different occasions. The increase in returned flux when the launch beam is circularly polarised 
is extremely clear. 



measurements indicate that these are untypical and that the normal wavefront 
error is only O.lX, far too small to account for the observed LGS size. 

The intensity distribution across the beam diameter, which is also an inter- 
esting parameter in propagation calculations, can be measured with the same 
CCD camera with better spatial resolution by removing the lenslet array. 
An additional CCD camera is planned, so that the intensity profile and the 
wavefront can be measured simultaneously. 

3.5. Polarization 

The polarization dependence of the resonant backscattering in sodium vapor 
and the mesospheric sodium layer has been reported by several authors (eg. 
Shore, 1990; Balykin, 1980; Happner, 1972; Hawkins, 1955). For studies 
on these effects and for the automatic angular control of a quarter wave 
plate a photo polarimeter has been constructed and installed. Two types of 
instruments have been tested: A division of amplitude polarimeter, and one 
with a rotating analyzer. Both instruments are capable of determining a set of 
parameters that describe the complete state of polarization of any elliptically 
polarized light. While the advantage of the rotating analyzer lies in easier 
calibration, the less complicated mechanics and lower sensitivity to intensity 
fluctuations made the division of amplitude polarimeter the choice to install 
at the exit of the launch telescope. First measurements of the dependence of 
the sodium response to the polarization were made in September 1998, and 
are presented in Figure 8. They show the remarkable result that as much as 
a factor 2 increase in returned flux can be achieved by circularly rather than 
linearly polarising the projected beam. 



4. Planned Upgrades 
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There are numerous problems associated with using mirrors to direct the laser 
beam to the telescope: alignment, active mirror control, jitter, turbulence, 
power loss from multiple reflections. The most limiting remaining difficulty 
is wavefront curvature in the projected beam, which is almost entirely due to 
distortion from the primary mirror of the launch telescope. A new telescope is 
being built for this purpose, which has been designed to allow easy aUgnment 
while still in situ on the main telescope. 

As an alternative to the beam relay we are experimenting with using a fibre 
for the same purpose. Although this avoids many of the difficulties we have 
encountered, it presents a new set mainly concerned with transmitting high 
powers through a narrow fibre without compromising beam quality. Experi- 
ments so far have been with a fused silica fibre which does not preserve the 
polarisation, but it is possible to buy fibres which do, or to reset the polarisa- 
tion at the launch telescope. In order to retain the mono-mode quality of the 
beam it is necessary to use fibre with a core diameter of only 4 /an, but this has 
knock-on effects such as increasing the Brillouin backscatter to as much as 
50%; we have measured a backscatter of 1.7 W with an input power of 3.5 W. 
It arises from the build-up of standing acoustic waves when high powers are 
forced into a narrow fibre, but can be suppressed by phase modulating the 
input beam at a frequency of about 100 MHz. We have successfully trans- 
ported the laser beam through the fibre with total inward and outward losses 
reducing the coupling efficiency to about 60%, similar to that of our current 
beam relay. However, the energy intensity, on the order of 10^^ Wm~^, is so 
great that heating warps the fibre and the coupling is lost after a few minutes. 

In a similar vein we are considering installing a Raman-fibre laser, which 
may become available with the required characteristics in the next few years. 
Calculations show that in order to be competitive with our current laser and 
produce a mv=9 mag guide star, a launch power of at least 5 W is necessary. 
The difference is due to the broader line-width (~2 GHz) of the fibre laser, 
so that much of the power is at wavelengths with a much smaller sodium 
absorption cross-section (the doppler broadened profile of Na at ~215 K in 
the mesosphere is 1 . 1 GHz). In principle, such a broad bandwidth could excite 
both D Unes which have a separation of only 1.77 GHz. The maximum exci- 
tation occurs if the peak laser power is shifted by 280 MHz from the 3S F=2 
level, although the gain would be less than 5% since much of the power is then 
at frequencies where the excitation cross-section is relatively small. Perhaps 
one of the most important advantages is that much higher powers can be used 
before saturation occurs, and a launch power of 25 W could produce a I" 
diameter my = 7.2 mag LGS with almost no saturation loss. In practice, the 
difficulty is in producing such high laser powers. 
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5. Conclusion 

The laser and beam-relay for the ALFA laser faciUty are nearing completion, 
although they are already functioning well enough for science observations 
to be carried out. 

The laser beam diagnostics is opening a wide field of interesting exper- 
iments on laser propagation in the atmosphere and effects of the sodium 
response in the mesosphere. For the operation of the laser guide star it serves 
as a tool to make the AO observations with the laser more efficient. Since 
the installation of the components in summer 1998, first measurements with 
the system have started. Ongoing experiments will show what innovations are 
needed for the most effective creation of the laser guide star for the adaptive 
optics. 
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